perm filename IN1[P11,LCS] blob
sn#341664 filedate 1978-03-10 generic text, type T, neo UTF8
PRECEDE;
SRT←12800;
INS 0 1; < INSTRUMENT 1
OSC P4 P6 B2 F1 P30;
OSC B2 P3 B2 F2 P29;
OUT B2 B1;END; < ALL PARAM NUMS ARE 2 LESS THAN IN BOOK!
INS 0 2; < INST 2 (GLISS) SET P6 TO -1. P5 IS DESTINATION OF GLISS.
OSC P4 P8 B2 F1 P30;MLT P6 P3 B3;AD2 P5 B3 B3;OSC B3 P8 B3 F3 P29;
AD2 P3 B3 B3;OSC B2 B3 B3 F2 P28;OUT B3 B1;END;
GEN 0 1 1 .01 0 .99 25 .99 400 0 511;<GEN INPUT MUST ALWAYS START NEW LINE!
GEN 0 2 2 .7 0 .5 0 .4 5;<F2 , 3 HARMONICS (1,3,5)
<GEN 0 3 3 0 1;<F3 PUTS LINE FROM 0 TO 1 IN 511 STEPS
< GEN 3 IS NOT YET AVAILABLE IN MUS511 ***** USE GEN 1
GEN 0 1 3 0 0 1 511;
INSTRUMENTS;
BUZZ 1 6 FREQ 3
GLIS 2 8 FREQ 3 5
END;
*
BUZZ ; < INSTRUMENT 1=BUZZ, BEGIN TIME=0",
P2 RHY; RHY=NEXT ENTRIES WILL BE IN TERMS OF MUSICAL RHYTHM.
16/////4./-8/
4./16////4/FINE;
P3 NOTES/C4/D/E/F/FS/G/EF5/D/A4;
P5 DF 1.5;P4 500;END;
TEMPO/96;
GLIS 0 5;P2 1;P3 NOTES/G1/C2/A/F5/EF6;P5 NO/G3//C5/C2/A4;
P7 DF 2.5;P6 -1;P4 500;END;
RUN;